home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fritz: All Fritz
/
All Fritz.zip
/
All Fritz
/
FILES
/
GRAPTIES
/
MULMDLT.LZH
/
MM1.EXE
/
EXAMPLE3.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-09-07
|
689b
|
33 lines
@echo off
: QUESTION EXAMPLE
show jupiter.gif
gtext "How long does Jupiter take" 1 5 16 180 260
gtext "to revolve around the Sun ?" 2 5 16 180 260
gtext "1 - 1 year" 5 21 14 200 260
gtext "2 - Almost 6 years" 6 21 14 200 260
gtext "3 - Almost 12 years" 7 21 14 200 260
gtext "4 - 22 years" 8 21 14 200 260
gtext "Please enter 1-4 ?" 9 21 16 180 260
KEY 1234
IF ERRORLEVEL 4 GOTO NO
IF ERRORLEVEL 3 GOTO YES
IF ERRORLEVEL 2 GOTO NO
IF ERRORLEVEL 1 GOTO NO
:YES
gtext "3 - Almost 12 years" 7 21 14 100 260
gtext "EXCELLENT" 11 21 16 100 260
SAY EXCELLENT
DELAY
SONG2
SCROLL UP
GOTO EXIT:
:NO
gtext "ALMOST" 11 21 16 200 260
SAY ALMOST
SCROLL DOWN
:EXIT